object ConfigDlg: TConfigDlg Left = 263 Top = 135 BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsSingle Caption = 'Read settings from registry' ClientHeight = 313 ClientWidth = 467 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object PageControl1: TPageControl Left = 0 Top = 0 Width = 467 Height = 313 ActivePage = TabSheet4 Align = alClient TabOrder = 0 object TabSheet1: TTabSheet Caption = 'TabSheet1' object Label2: TLabel Left = 40 Top = 218 Width = 70 Height = 13 Caption = 'Select subkey:' end object ComboBox1: TComboBox Left = 120 Top = 216 Width = 185 Height = 21 HelpContext = 487 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ItemHeight = 0 ParentFont = False TabOrder = 0 OnChange = ComboBox1Change end object OKBtn: TButton Left = 344 Top = 214 Width = 74 Height = 25 Caption = 'Read' TabOrder = 1 OnClick = OKBtnClick end object CancelBtn: TButton Left = 344 Top = 244 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' Default = True ModalResult = 2 TabOrder = 2 end object Panel1: TPanel Left = 0 Top = 0 Width = 459 Height = 185 Align = alTop BevelOuter = bvNone BorderWidth = 5 BorderStyle = bsSingle Color = clWindow TabOrder = 3 object Label1: TLabel Left = 5 Top = 5 Width = 445 Height = 13 Align = alTop Caption = 'Subkey "Default":' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Memo3: TMemo Left = 5 Top = 24 Width = 445 Height = 152 HelpContext = 487 BorderStyle = bsNone Color = clYellow Lines.Strings = ( 'Read reg (mode 0) write reg (mode 1) Run now (mode 4)') ReadOnly = True TabOrder = 0 end end end object TabSheet2: TTabSheet Caption = 'TabSheet2' object Panel2: TPanel Left = 0 Top = 0 Width = 0 Height = 185 Align = alTop BevelOuter = bvNone BorderWidth = 5 BorderStyle = bsSingle Color = clWindow TabOrder = 0 object Label4: TLabel Left = 5 Top = 5 Width = 445 Height = 13 Align = alTop Caption = 'Done' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Memo1: TMemo Left = 5 Top = 24 Width = 445 Height = 152 BorderStyle = bsNone Color = clYellow Lines.Strings = ( 'Having read registry') ReadOnly = True TabOrder = 0 end end object Button1: TButton Left = 176 Top = 216 Width = 75 Height = 25 Caption = 'OK' ModalResult = 1 TabOrder = 1 end end object TabSheet3: TTabSheet Caption = 'TabSheet3' object Panel3: TPanel Left = 0 Top = 0 Width = 0 Height = 185 Align = alTop BevelOuter = bvNone BorderWidth = 5 BorderStyle = bsSingle Color = clWindow TabOrder = 0 object Label6: TLabel Left = 5 Top = 5 Width = 445 Height = 13 Align = alTop Caption = 'Done' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Memo2: TMemo Left = 5 Top = 24 Width = 445 Height = 152 BorderStyle = bsNone Color = clYellow Lines.Strings = ( 'Having saved to registry') ReadOnly = True TabOrder = 0 end end object Button2: TButton Left = 176 Top = 216 Width = 75 Height = 25 Caption = 'OK' ModalResult = 1 TabOrder = 1 end end object TabSheet4: TTabSheet Caption = 'TabSheet4' object Panel4: TPanel Left = 0 Top = 0 Width = 459 Height = 185 Align = alTop BevelOuter = bvNone BorderWidth = 5 BorderStyle = bsSingle Caption = 'Panel4' Color = clWindow TabOrder = 0 object Label3: TLabel Left = 5 Top = 5 Width = 445 Height = 13 Align = alTop Caption = 'Done' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Memo4: TMemo Left = 5 Top = 24 Width = 445 Height = 152 BorderStyle = bsNone Color = clYellow Lines.Strings = ( 'Having loaded hard-coded settings (mode=2)') ReadOnly = True TabOrder = 0 end end object Button3: TButton Left = 176 Top = 216 Width = 75 Height = 25 Caption = 'OK' ModalResult = 1 TabOrder = 1 end end object TabSheet5: TTabSheet Caption = 'TabSheet5' object Panel5: TPanel Left = 0 Top = 0 Width = 0 Height = 185 Align = alTop BevelOuter = bvNone BorderWidth = 5 BorderStyle = bsSingle Caption = 'Panel4' Color = clWindow TabOrder = 0 object Label5: TLabel Left = 5 Top = 5 Width = 445 Height = 13 Align = alTop Caption = 'Welcome!' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Memo5: TMemo Left = 5 Top = 24 Width = 445 Height = 152 BorderStyle = bsNone Color = clYellow Lines.Strings = ( 'Startup welcome text (mode=3)') ReadOnly = True TabOrder = 0 end end object Button4: TButton Left = 176 Top = 216 Width = 75 Height = 25 Caption = 'OK' TabOrder = 1 OnClick = Button4Click end end object TabSheet6: TTabSheet Caption = 'TabSheet6' object Label8: TLabel Left = 24 Top = 218 Width = 82 Height = 13 Caption = 'Select username:' end object Panel6: TPanel Left = 0 Top = 0 Width = 0 Height = 185 Align = alTop BevelOuter = bvNone BorderWidth = 5 BorderStyle = bsSingle Caption = 'Panel4' Color = clWindow TabOrder = 0 object Label7: TLabel Left = 5 Top = 5 Width = 445 Height = 13 Align = alTop Caption = 'Select username:' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Memo6: TMemo Left = 5 Top = 24 Width = 445 Height = 152 BorderStyle = bsNone Color = clYellow Lines.Strings = ( 'Select username (mode=5)') ReadOnly = True TabOrder = 0 end end object ComboBox2: TComboBox Left = 120 Top = 216 Width = 185 Height = 21 HelpContext = 487 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ItemHeight = 0 ParentFont = False TabOrder = 1 OnChange = ComboBox1Change end object Button5: TButton Left = 344 Top = 214 Width = 74 Height = 25 Caption = 'OK' ModalResult = 1 TabOrder = 2 end object Button6: TButton Left = 344 Top = 244 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' Default = True ModalResult = 2 TabOrder = 3 end end end end